(require 'typopunct)
(add-to-list 'typopunct-language-alist
             `(russian ,(decode-char 'ucs #xAB)
                       ,(decode-char 'ucs #xBB)
                       ,(decode-char 'ucs #x201E)
                       ,(decode-char 'ucs #x201C)))
(typopunct-change-language 'russian t)
